home *** CD-ROM | disk | FTP | other *** search
- object ScannerTester: TScannerTester
- Left = 299
- Top = 251
- Width = 520
- Height = 97
- Caption = 'Address Lookup'
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 16
- Top = 8
- Width = 56
- Height = 13
- Caption = '&Code Offset'
- FocusControl = AddressEdit
- end
- object Label2: TLabel
- Left = 376
- Top = 8
- Width = 58
- Height = 13
- Caption = 'Line number'
- end
- object Label3: TLabel
- Left = 240
- Top = 8
- Width = 48
- Height = 13
- Caption = 'Unit name'
- end
- object UnitNameEdit: TEdit
- Left = 240
- Top = 24
- Width = 113
- Height = 21
- Enabled = False
- ReadOnly = True
- TabOrder = 0
- end
- object AddressEdit: TEdit
- Left = 16
- Top = 24
- Width = 121
- Height = 21
- TabOrder = 1
- Text = '$1000'
- end
- object ToUnitLineBtn: TButton
- Left = 160
- Top = 24
- Width = 57
- Height = 25
- Caption = '&Lookup'
- TabOrder = 2
- OnClick = ToUnitLineBtnClick
- end
- object LineNumberEdit: TEdit
- Left = 376
- Top = 24
- Width = 113
- Height = 21
- Enabled = False
- ReadOnly = True
- TabOrder = 3
- end
- end
-